/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / BARNET / PROGRAMMING / EXAMPLES / TASKWIN / !TestProg1 / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 0d 00 14 33 f4 20 64 65 | 6d 6f 6e 73 74 72 61 74 |...3. de|monstrat|
|00000020| 65 73 20 68 6f 77 20 74 | 6f 20 75 73 65 20 54 61 |es how t|o use Ta|
|00000030| 73 6b 57 69 6e 64 6f 77 | 73 20 70 72 6f 70 65 72 |skWindow|s proper|
|00000040| 6c 79 2e 0d 00 1e 05 3a | 0d 00 28 1f ee 20 85 20 |ly.....:|..(.. . |
|00000050| 85 20 a2 20 30 2c f6 24 | 2b 22 20 61 74 20 6c 69 |. . 0,.$|+" at li|
|00000060| 6e 65 20 22 2b c3 9e 0d | 00 32 05 3a 0d 00 3c 0b |ne "+...|.2.:..<.|
|00000070| 71 75 69 74 25 3d a3 0d | 00 5a 13 74 61 73 6b 5f |quit%=..|.Z.task_|
|00000080| 72 75 6e 6e 69 6e 67 25 | 3d a3 0d 00 64 0c de 20 |running%|=...d.. |
|00000090| 71 25 20 32 35 36 0d 00 | 6e 10 de 20 65 72 72 6f |q% 256..|n.. erro|
|000000a0| 72 25 20 32 35 36 0d 00 | 78 0b 6d 61 73 6b 25 3d |r% 256..|x.mask%=|
|000000b0| 30 0d 00 82 0f 69 6e 64 | 73 69 7a 65 25 3d 35 30 |0....ind|size%=50|
|000000c0| 0d 00 8c 15 de 20 69 6e | 64 69 72 25 20 69 6e 64 |..... in|dir% ind|
|000000d0| 73 69 7a 65 25 0d 00 96 | 3a c8 99 20 22 57 69 6d |size%...|:.. "Wim|
|000000e0| 70 5f 49 6e 69 74 69 61 | 6c 69 73 65 22 2c 32 30 |p_Initia|lise",20|
|000000f0| 30 2c 26 34 62 35 33 34 | 31 35 34 2c 22 54 65 73 |0,&4b534|154,"Tes|
|00000100| 74 50 72 6f 67 22 20 b8 | 20 2c 74 61 73 6b 25 0d |tProg" .| ,task%.|
|00000110| 00 a0 36 c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |..6.. "W|imp_Open|
|00000120| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 22 3c 54 65 73 |Template|",,"<Tes|
|00000130| 74 50 72 6f 67 24 44 69 | 72 3e 2e 54 65 6d 70 6c |tProg$Di|r>.Templ|
|00000140| 61 74 65 73 22 0d 00 aa | 40 c8 99 20 22 57 69 6d |ates"...|@.. "Wim|
|00000150| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00000160| 2c 71 25 2b 34 2c 69 6e | 64 69 72 25 2c 69 6e 64 |,q%+4,in|dir%,ind|
|00000170| 69 72 25 2b 69 6e 64 73 | 69 7a 65 25 2c 2d 31 2c |ir%+inds|ize%,-1,|
|00000180| 22 2a 22 2c 30 0d 00 b4 | 2c c8 99 20 22 57 69 6d |"*",0...|,.. "Wim|
|00000190| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|000001a0| 2c 71 25 2b 34 20 b8 20 | 77 69 6e 64 68 61 6e 64 |,q%+4 . |windhand|
|000001b0| 25 0d 00 be 1b c8 99 20 | 22 57 69 6d 70 5f 43 6c |%...... |"Wimp_Cl|
|000001c0| 6f 73 65 54 65 6d 70 6c | 61 74 65 22 0d 00 c8 11 |oseTempl|ate"....|
|000001d0| 21 71 25 3d 77 69 6e 64 | 68 61 6e 64 25 0d 00 d2 |!q%=wind|hand%...|
|000001e0| 1c c8 99 20 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 |... "Wim|p_OpenWi|
|000001f0| 6e 64 6f 77 22 2c 2c 71 | 25 0d 00 dc 05 3a 0d 00 |ndow",,q|%....:..|
|00000200| e6 05 f5 0d 00 f0 26 20 | 20 c8 99 20 22 57 69 6d |......& | .. "Wim|
|00000210| 70 5f 50 6f 6c 6c 22 2c | 6d 61 73 6b 25 2c 71 25 |p_Poll",|mask%,q%|
|00000220| 20 b8 20 65 76 65 6e 74 | 25 0d 00 fa 11 20 20 c8 | . event|%....  .|
|00000230| 8e 20 65 76 65 6e 74 25 | 20 ca 0d 01 04 26 20 20 |. event%| ....&  |
|00000240| 20 20 c9 20 32 20 3a 20 | c8 99 20 22 57 69 6d 70 |  . 2 : |.. "Wimp|
|00000250| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 71 25 |_OpenWin|dow",,q%|
|00000260| 0d 01 0e 15 20 20 20 20 | c9 20 33 20 3a 20 71 75 |....    |. 3 : qu|
|00000270| 69 74 25 3d b9 0d 01 18 | 14 20 20 20 20 c9 20 36 |it%=....|.    . 6|
|00000280| 20 3a 20 f2 6d 6f 75 73 | 65 0d 01 22 1d 20 20 20 | : .mous|e..".   |
|00000290| 20 c9 20 31 37 2c 31 38 | 2c 31 39 20 3a 20 f2 6d | . 17,18|,19 : .m|
|000002a0| 65 73 73 61 67 65 0d 01 | 2c 07 20 20 cb 0d 01 36 |essage..|,.  ...6|
|000002b0| 0b fd 20 71 75 69 74 25 | 0d 01 40 05 e0 0d 01 54 |.. quit%|..@....T|
|000002c0| 05 3a 0d 01 5e 0b dd f2 | 6d 6f 75 73 65 0d 01 68 |.:..^...|mouse..h|
|000002d0| 2d e7 20 71 25 21 31 32 | 3d 77 69 6e 64 68 61 6e |-. q%!12|=windhan|
|000002e0| 64 25 20 80 20 71 25 21 | 31 36 3d 31 20 8c 20 f2 |d% . q%!|16=1 . .|
|000002f0| 6c 61 75 6e 63 68 5f 61 | 70 70 0d 01 72 05 e1 0d |launch_a|pp..r...|
|00000300| 01 7c 05 3a 0d 01 86 0d | dd f2 6d 65 73 73 61 67 |.|.:....|..messag|
|00000310| 65 0d 01 90 0e c8 8e 20 | 71 25 21 31 36 20 ca 0d |e...... |q%!16 ..|
|00000320| 01 9a 13 20 20 c9 20 30 | 20 3a 20 71 75 69 74 25 |...  . 0| : quit%|
|00000330| 3d b9 0d 01 a4 1d 20 20 | c9 20 26 38 30 38 43 31 |=.....  |. &808C1|
|00000340| 20 3a 20 f2 74 61 73 6b | 5f 6f 75 74 70 75 74 0d | : .task|_output.|
|00000350| 01 ae 1a 20 20 c9 20 26 | 38 30 38 43 32 20 3a 20 |...  . &|808C2 : |
|00000360| f2 74 61 73 6b 5f 65 67 | 6f 0d 01 b8 1c 20 20 c9 |.task_eg|o....  .|
|00000370| 20 26 38 30 38 43 33 20 | 3a 20 f2 74 61 73 6b 5f | &808C3 |: .task_|
|00000380| 6d 6f 72 69 6f 0d 01 c2 | 05 cb 0d 01 cc 05 e1 0d |morio...|........|
|00000390| 01 d6 05 3a 0d 01 e0 10 | dd f2 6c 61 75 6e 63 68 |...:....|..launch|
|000003a0| 5f 61 70 70 0d 01 ea 17 | e7 20 74 61 73 6b 5f 72 |_app....|. task_r|
|000003b0| 75 6e 6e 69 6e 67 25 3d | a3 20 8c 0d 01 f4 77 20 |unning%=|. ....w |
|000003c0| 20 c8 99 20 22 57 69 6d | 70 5f 53 74 61 72 74 54 | .. "Wim|p_StartT|
|000003d0| 61 73 6b 22 2c 22 54 61 | 73 6b 77 69 6e 64 6f 77 |ask","Ta|skwindow|
|000003e0| 20 3c 54 65 73 74 50 72 | 6f 67 24 44 69 72 3e 2e | <TestPr|og$Dir>.|
|000003f0| 50 72 6f 67 6c 65 74 20 | 33 32 4b 20 50 72 6f 67 |Proglet |32K Prog|
|00000400| 6c 65 74 20 2d 63 74 72 | 6c 20 2d 71 75 69 74 20 |let -ctr|l -quit |
|00000410| 2d 74 61 73 6b 20 26 22 | 2b c3 7e 74 61 73 6b 25 |-task &"|+.~task%|
|00000420| 2b 22 20 2d 74 78 74 20 | 26 34 32 34 32 34 32 34 |+" -txt |&4242424|
|00000430| 32 22 0d 01 fe 13 20 20 | 21 71 25 3d 77 69 6e 64 |2"....  |!q%=wind|
|00000440| 68 61 6e 64 25 0d 02 08 | 0c 20 20 71 25 21 34 3d |hand%...|.  q%!4=|
|00000450| 30 0d 02 12 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |0...   .|. "Wimp_|
|00000460| 47 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 71 |GetIconS|tate",,q|
|00000470| 25 0d 02 1c 15 20 20 69 | 63 6f 6e 64 61 74 61 25 |%....  i|condata%|
|00000480| 3d 71 25 21 32 38 0d 02 | 26 14 20 20 69 63 6f 6e |=q%!28..|&.  icon|
|00000490| 6c 65 6e 25 3d 71 25 21 | 33 36 0d 02 30 21 20 20 |len%=q%!|36..0!  |
|000004a0| 24 69 63 6f 6e 64 61 74 | 61 25 3d c4 69 63 6f 6e |$icondat|a%=.icon|
|000004b0| 6c 65 6e 25 2d 31 2c 22 | 20 22 29 0d 02 31 1e 20 |len%-1,"| ")..1. |
|000004c0| 20 69 63 6f 6e 64 61 74 | 61 25 3f 28 69 63 6f 6e | icondat|a%?(icon|
|000004d0| 6c 65 6e 25 2d 31 29 3d | 30 0d 02 44 0f 20 20 63 |len%-1)=|0..D.  c|
|000004e0| 75 72 70 6f 73 25 3d 30 | 0d 02 45 10 20 20 64 69 |urpos%=0|..E.  di|
|000004f0| 73 63 61 72 64 25 3d 30 | 0d 02 4e 18 20 20 6d 61 |scard%=0|..N.  ma|
|00000500| 78 70 6f 73 25 3d 69 63 | 6f 6e 6c 65 6e 25 2d 31 |xpos%=ic|onlen%-1|
|00000510| 0d 02 58 15 20 20 74 61 | 73 6b 5f 72 75 6e 6e 69 |..X.  ta|sk_runni|
|00000520| 6e 67 25 3d b9 0d 02 62 | 05 cd 0d 02 6c 05 e1 0d |ng%=...b|....l...|
|00000530| 02 76 05 3a 0d 02 80 11 | dd f2 74 61 73 6b 5f 6f |.v.:....|..task_o|
|00000540| 75 74 70 75 74 0d 02 8a | 1c f2 65 6d 75 6c 61 74 |utput...|..emulat|
|00000550| 65 76 64 75 28 71 25 21 | 32 30 2c 71 25 2b 32 34 |evdu(q%!|20,q%+24|
|00000560| 29 0d 02 b2 05 e1 0d 02 | ee 05 3a 0d 02 f8 0e dd |).......|..:.....|
|00000570| f2 74 61 73 6b 5f 65 67 | 6f 0d 03 02 05 e1 0d 03 |.task_eg|o.......|
|00000580| 0c 05 3a 0d 03 16 10 dd | f2 74 61 73 6b 5f 6d 6f |..:.....|.task_mo|
|00000590| 72 69 6f 0d 03 20 1d 24 | 71 25 3d bd 31 30 2b 22 |rio.. .$|q%=.10+"|
|000005a0| 54 61 73 6b 20 63 6f 6d | 70 6c 65 74 65 64 21 22 |Task com|pleted!"|
|000005b0| 0d 03 2a 1a f2 65 6d 75 | 6c 61 74 65 76 64 75 28 |..*..emu|latevdu(|
|000005c0| a9 28 24 71 25 29 2c 71 | 25 29 0d 03 34 13 74 61 |.($q%),q|%)..4.ta|
|000005d0| 73 6b 5f 72 75 6e 6e 69 | 6e 67 25 3d a3 0d 03 3e |sk_runni|ng%=...>|
|000005e0| 05 e1 0d 03 48 05 3a 0d | 03 52 1c dd f2 65 6d 75 |....H.:.|.R...emu|
|000005f0| 6c 61 74 65 76 64 75 28 | 6c 65 6e 25 2c 66 72 6f |latevdu(|len%,fro|
|00000600| 6d 25 29 0d 03 5c 14 f2 | 6c 6f 67 28 6c 65 6e 25 |m%)..\..|log(len%|
|00000610| 2c 66 72 6f 6d 25 29 0d | 03 66 16 e3 20 62 79 74 |,from%).|.f.. byt|
|00000620| 65 25 3d 30 20 b8 20 6c | 65 6e 25 2d 31 0d 03 70 |e%=0 . l|en%-1..p|
|00000630| 22 20 20 e7 20 64 69 73 | 63 61 72 64 25 3e 30 20 |"  . dis|card%>0 |
|00000640| 64 69 73 63 61 72 64 25 | 2d 3d 31 20 3a 20 ed 0d |discard%|-=1 : ..|
|00000650| 03 7a 17 20 20 63 68 61 | 72 25 3d 66 72 6f 6d 25 |.z.  cha|r%=from%|
|00000660| 3f 62 79 74 65 25 0d 03 | 84 10 20 20 c8 8e 20 63 |?byte%..|..  .. c|
|00000670| 68 61 72 25 20 ca 0d 03 | 8e 53 20 20 20 20 c9 20 |har% ...|.S    . |
|00000680| 32 2c 33 2c 34 2c 35 2c | 36 2c 37 2c 31 32 2c 31 |2,3,4,5,|6,7,12,1|
|00000690| 34 2c 31 35 2c 31 36 2c | 32 30 2c 32 31 2c 32 36 |4,15,16,|20,21,26|
|000006a0| 2c 32 37 2c 33 30 20 f4 | 20 63 6f 64 65 73 20 64 |,27,30 .| codes d|
|000006b0| 6f 6e 27 74 20 68 61 76 | 65 20 6d 65 61 6e 69 6e |on't hav|e meanin|
|000006c0| 67 20 66 6f 72 20 75 73 | 2e 0d 03 a2 1e 20 20 20 |g for us|.....   |
|000006d0| 20 c9 20 31 2c 31 37 2c | 32 32 20 3a 20 64 69 73 | . 1,17,|22 : dis|
|000006e0| 63 61 72 64 25 3d 31 0d | 03 ac 1c 20 20 20 20 c9 |card%=1.|...    .|
|000006f0| 20 31 38 2c 33 31 20 3a | 20 64 69 73 63 61 72 64 | 18,31 :| discard|
|00000700| 25 3d 32 0d 03 ad 1c 20 | 20 20 20 c9 20 32 38 2c |%=2.... |   . 28,|
|00000710| 32 39 20 3a 20 64 69 73 | 63 61 72 64 25 3d 34 0d |29 : dis|card%=4.|
|00000720| 03 b6 1c 20 20 20 20 c9 | 20 31 39 2c 32 35 20 3a |...    .| 19,25 :|
|00000730| 20 64 69 73 63 61 72 64 | 25 3d 35 0d 03 c0 19 20 | discard|%=5.... |
|00000740| 20 20 20 c9 20 32 34 20 | 3a 20 64 69 73 63 61 72 |   . 24 |: discar|
|00000750| 64 25 3d 38 0d 03 ca 19 | 20 20 20 20 c9 20 32 33 |d%=8....|    . 23|
|00000760| 20 3a 20 64 69 73 63 61 | 72 64 25 3d 39 0d 03 cb | : disca|rd%=9...|
|00000770| 1e 20 20 20 20 c9 20 30 | 20 20 3a 20 f4 20 64 6f |.    . 0|  : . do|
|00000780| 65 73 20 6e 6f 74 68 69 | 6e 67 2e 0d 03 98 19 20 |es nothi|ng..... |
|00000790| 20 20 20 c9 20 38 20 20 | 3a 20 63 75 72 70 6f 73 |   . 8  |: curpos|
|000007a0| 25 2d 3d 31 0d 03 e8 19 | 20 20 20 20 c9 20 39 20 |%-=1....|    . 9 |
|000007b0| 20 3a 20 63 75 72 70 6f | 73 25 2b 3d 31 0d 03 f2 | : curpo|s%+=1...|
|000007c0| 0f 20 20 20 20 c9 20 31 | 30 2c 31 31 0d 03 fc 1c |.    . 1|0,11....|
|000007d0| 20 20 20 20 20 20 e3 20 | 73 70 63 25 3d 30 20 b8 |      . |spc%=0 .|
|000007e0| 20 6d 61 78 70 6f 73 25 | 0d 04 06 1d 20 20 20 20 | maxpos%|....    |
|000007f0| 20 20 20 20 69 63 6f 6e | 64 61 74 61 25 3f 73 70 |    icon|data%?sp|
|00000800| 63 25 3d 32 30 0d 04 10 | 10 20 20 20 20 20 20 ed |c%=20...|.      .|
|00000810| 20 73 70 63 25 0d 04 1a | 18 20 20 20 20 c9 20 31 | spc%...|.    . 1|
|00000820| 33 20 3a 20 63 75 72 70 | 6f 73 25 3d 30 0d 04 24 |3 : curp|os%=0..$|
|00000830| 31 20 20 20 20 c9 20 31 | 32 37 20 3a 20 63 75 72 |1    . 1|27 : cur|
|00000840| 70 6f 73 25 2d 3d 31 20 | 3a 20 69 63 6f 6e 64 61 |pos%-=1 |: iconda|
|00000850| 74 61 25 3f 63 75 72 70 | 6f 73 25 3d 32 30 0d 03 |ta%?curp|os%=20..|
|00000860| de 09 20 20 20 20 7f 0d | 04 2e 21 20 20 20 20 20 |..    ..|..!     |
|00000870| 20 69 63 6f 6e 64 61 74 | 61 25 3f 63 75 72 70 6f | icondat|a%?curpo|
|00000880| 73 25 3d 63 68 61 72 25 | 0d 04 38 14 20 20 20 20 |s%=char%|..8.    |
|00000890| 20 20 63 75 72 70 6f 73 | 25 2b 3d 31 0d 04 42 07 |  curpos|%+=1..B.|
|000008a0| 20 20 cb 0d 04 4c 21 20 | 20 63 75 72 70 6f 73 25 |  ...L! | curpos%|
|000008b0| 3d 94 20 63 75 72 70 6f | 73 25 20 83 20 6d 61 78 |=. curpo|s% . max|
|000008c0| 70 6f 73 25 0d 04 56 0b | ed 20 62 79 74 65 25 0d |pos%..V.|. byte%.|
|000008d0| 04 57 11 21 71 25 3d 77 | 69 6e 64 68 61 6e 64 25 |.W.!q%=w|indhand%|
|000008e0| 0d 02 bc 0a 71 25 21 34 | 3d 30 0d 02 c6 0a 71 25 |....q%!4|=0....q%|
|000008f0| 21 38 3d 30 0d 02 d0 0b | 71 25 21 31 32 3d 30 0d |!8=0....|q%!12=0.|
|00000900| 02 da 1e c8 99 20 22 57 | 69 6d 70 5f 53 65 74 49 |..... "W|imp_SetI|
|00000910| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 71 25 0d 02 e4 |conState|",,q%...|
|00000920| 05 e1 0d ff             |                         |....    |        |
+--------+-------------------------+-------------------------+--------+--------+